home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HAM Radio 1997
/
HAM Radio 1997.iso
/
vcls
/
multlang.000
/
example
/
mdefstr.dfm
/
mdefstr.txt
Wrap
Text File
|
1996-04-08
|
8KB
|
202 lines
object DefStr: TDefStr
Left = 275
Top = 111
Width = 388
Height = 277
Caption = 'User defined strings'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
FormStyle = fsMDIChild
PixelsPerInch = 96
Position = poScreenCenter
Visible = True
OnClose = FormClose
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 4
Width = 361
Height = 89
Alignment = taCenter
AutoSize = False
Caption =
'You can store private (this window) or global (all windows) user' +
' defined strings. The string returned by the TMultLang component' +
' depends on the selected language. Use the GetString and Set str' +
'ing methods.'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 12
Top = 104
Width = 237
Height = 33
AutoSize = False
Caption = 'Shows a defined string called '#39'FileNotFound'#39
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 16
Top = 180
Width = 237
Height = 53
AutoSize = False
Caption =
'Shows a string string called '#39'FileNotFound2'#39'. This string says: ' +
'"Sorry, && FileNotFound &&. Because it is pointing to device %s ' +
'which does not exist"'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Button1: TButton
Left = 260
Top = 100
Width = 113
Height = 25
Caption = 'Show simple'
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 260
Top = 176
Width = 113
Height = 25
Caption = 'Show advanced'
TabOrder = 1
OnClick = Button2Click
end
object Edit1: TEdit
Left = 12
Top = 148
Width = 121
Height = 17
Color = clBtnFace
TabOrder = 2
Text = 'Y:\PATRIK.DBF'
end
object MultLang1: TMultLang
Left = 324
Top = 52
Width = 45
Height = 22
AlignIcon = alLeft
AlignText = alLeft
IconMargin = 1
ItemHeight = 16
Items.Strings = (
'English'
'Swedish')
ShowIcons = False
Text = 'English'
ResizeIcon = False
TextMargin = 5
DefaultLanguage = 'English'
LanguagesData = {
06373238363432010001000000000007456E676C697368000001000000010007
53776564697368000000000100010000001E5468652066696C6520257320636F
756C64206E6F7420626520666F756E64094D756C744C616E67310D2346696C65
4E6F74466F756E64FFFF01000100000050536F7272792C202646696C654E6F74
466F756E64262E204265636175736520697420697320706F696E74696E672074
6F2064657669636520257320776869636820646F6573206E6F74206578697374
21094D756C744C616E67310E2346696C654E6F74466F756E6432FFFF01000100
01001A46696C656E202573206B756E646520696E746520686974746173094D75
6C744C616E67310D2346696C654E6F74466F756E64FFFF0100010001004F5479
76E472722C202646696C654E6F74466F756E64262E20502E672E612061747420
64656E2070656B61722074696C6C20656E686574656E20257320736F6D20696E
74652065786973746572617221094D756C744C616E67310E2346696C654E6F74
466F756E6432FFFF0100010001000A26C57465727374E46C6C094D756C744C61
6E67311153797374656D4D656E75526573746F7265FFFF010001000100072646
6C79747461094D756C744C616E67310E53797374656D4D656E754D6F7665FFFF
0100010001000E26C46E6472612073746F726C656B094D756C744C616E67310E
53797374656D4D656E7553697A65FFFF010001000100094D69266E696D657261
094D756C744C616E67311253797374656D4D656E754D696E696D697A65FFFF01
0001000100094D612678696D657261094D756C744C616E67311253797374656D
4D656E754D6178696D697A65FFFF0100010001000D265374E46E6709416C742B
4634094D756C744C616E67310F53797374656D4D656E75436C6F7365FFFF0100
01000100172656E4786C612070726F6772616D094374726C2B455343094D756C
744C616E67311253797374656D4D656E755461736B4C697374FFFF0100010001
000E264EE47374612066F66E73746572094D756C744C616E6731145379737465
6D4D656E754E65787457696E646F77FFFF0100010001001D416E76E46E646172
20646566696E657261646520737472E46E676172730754446566537472074361
7074696F6EFFFF010001000100DD4475206B616E207370617261206C6F6B616C
612028646574746120666F726D756CE4722920656C6C657220676C6F62616C61
2028616C6C6120666F726D756CE4722920616E76E46E646172646566696E6965
7261646520737472E46E6761722E2044656E2072657475726E65726164652073
7472E46E67656E206672E56E20544D756C744C616E67206B6F6D706F6E656E74
656E206265726F722070E5206465742076616C646120737072E56B65742E2041
6E76E46E6420476574537472696E67206F636820536574537472696E67206675
6E6B74696F6E65726E612E064C6162656C310743617074696F6EFFFF01000100
01000A5669736120656E6B656C07427574746F6E310743617074696F6EFFFF01
00010001000E56697361206176616E636572616407427574746F6E3207436170
74696F6EFFFF01000100010032566973617220656E20646566696E6572616420
737472E46E6720736F6D206865746572202746696C654E6F74466F756E642706
4C6162656C320743617074696F6EFFFF0100010001009E566973617220656E20
646566696E6572616420737472E46E6720736F6D206865746572202746696C65
4E6F74466F756E6432272E2044656E6E6120737472E46E67206C796465723A20
22547976E472722C2026262046696C654E6F74466F756E642026262E20502E67
2E61206174742064656E2070656B61722074696C6C20656E686574656E202573
20736F6D20696E7465206578697374657261722122064C6162656C3307436170
74696F6EFFFF0100010001000A4F4B7C26537570657262094D427574746F6E73
310843617074696F6E73000001000100010021416E76E46E6461722064656669
6E6572617420737472E46E67206578656D70656C094D427574746F6E73310554
69746C65FFFF0100010000000826526573746F7265094D756C744C616E673111
53797374656D4D656E75526573746F7265FFFF01000100000005264D6F766509
4D756C744C616E67310E53797374656D4D656E754D6F7665FFFF010001000000
052653697A65094D756C744C616E67310E53797374656D4D656E7553697A65FF
FF010001000000094D69266E696D697A65094D756C744C616E67311253797374
656D4D656E754D696E696D697A65FFFF010001000000094D612678696D697A65
094D756C744C616E67311253797374656D4D656E754D6178696D697A65FFFF01
00010000000D26436C6F736509416C742B4634094D756C744C616E67310F5379
7374656D4D656E75436C6F7365FFFF01000100000000094D756C744C616E6731
1253797374656D4D656E755461736B4C697374FFFF01000100000000094D756C
744C616E67311453797374656D4D656E754E65787457696E646F77FFFF010001
000000145573657220646566696E656420737472696E67730754446566537472
0743617074696F6EFFFF010001000000CC596F752063616E2073746F72652070
7269766174652028746869732077696E646F7729206F7220676C6F62616C2028
616C6C2077696E646F777329207573657220646566696E656420737472696E67
732E2054686520737472696E672072657475726E65642062792074686520544D
756C744C616E6720636F6D706F6E656E7420646570656E6473206F6E20746865
2073656C6563746564206C616E67756167652E20557365207468652047657453
7472696E6720616E642053657420737472696E67206D6574686F64732E064C61
62656C310743617074696F6EFFFF0100010000000B53686F772073696D706C65
07427574746F6E310743617074696F6EFFFF0100010000000D53686F77206164
76616E63656407427574746F6E320743617074696F6EFFFF0100010000002C53
686F7773206120646566696E656420737472696E672063616C6C656420274669
6C654E6F74466F756E6427064C6162656C320743617074696F6EFFFF01000100
00009553686F7773206120737472696E6720737472696E672063616C6C656420
2746696C654E6F74466F756E6432272E205468697320737472696E6720736179
733A2022536F7272792C2026262046696C654E6F74466F756E642026262E2042
65636175736520697420697320706F696E74696E6720746F2064657669636520
257320776869636820646F6573206E6F7420657869737422064C6162656C3307
43617074696F6EFFFF010001000000064F4B7C264F4B094D427574746F6E7331
0843617074696F6E7300000100010000001B5573657220646566696E65642073
7472696E67206578616D706C65094D427574746F6E7331055469746C65FFFF00
00}
end
object MButtons1: TMButtons
Captions.Strings = (
'OK|&OK'
'Cancel|&Cancel'
'Yes|&Yes'
'No|&No')
Translate = False
Title = 'User defined string example'
Left = 8
Top = 48
end
end